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Appendix: 

DRAWINGS SHOWING PROPOSED CHANGES 
IN MARK-UP FORM USING 
RED INK 



Create a Skeleton for Use by 
the ISPF File Tailoring Utility 



I 



11 



Run JCL Script to Launch 
FTAILOR and Provide 
Parameters 



I 



31 



Run FTAILOR 



I 



FTAILOR Launches ISPF 
File Tailoring Function 



I 
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^Process Complete^ >^" 



34 



30 



Figure 3 



s$/ Process Step 



Create a Template / Skeleton 



I 
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Create anlSPF Environment 
inJCL 
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D eagnate the File that C osteins 
the Template /Skeleton 
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Create a Reference to 
an Output File 



44 
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Launch FTAILOR 



PasstoFTAILORthe 
Control Parameters 
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t * t^i 

f Process Complete J 



Example 

Into DELSKEL In directory USERSKELS.UB CA 
)D0TTABLE1 s^V 

DELETE '&DSNAME(&MBRKAWE)' A 
)ENDDOT ^ 



//FTAIUOR EXEC ISPBATCH 

//SYSEXECO DD DSN=DBDCPP.TOOLS.EXEC,DISP=SHR 



//ISPSUB DD DISP=SHR, DSN=USER.SK£LS.UB 



VISPFILE DD DISP=(NEW.CATLG),DSN=USER.Ol/rPLfT.FILE 
OCB=(lflECb=80 ( RECFM=FB), SPACE=(TRK, (1 0,1), RLSE) 



flSYSTIN DD* 

ISPSTART CMD(FTAIUOR) 



Pass to FTAILOR the tattes 


✓47 


for preparation for file tailoring 





C//PARMSDD* 
SKELNAM='DEL6KEL* 
KEYS='MBRNAME' 
DSNAME=yxx.yyy' 



//TABLE1 DD* 
MEMBER1 
MEM8ER2 
MEMBER3 



DELETE *xxx.mCMEMBER1)' 
DELETE *»oc.yyY(MEMBER2)' 
DELETE *xxx.y¥y(MEMBER3)' 



Figure 4 



